home *** CD-ROM | disk | FTP | other *** search
/ Programming Windows (5th Edition) / Programming Windows, 5th ed. - Companion CD (097-0002183)(1999).iso / Chap14 / Sketch / Sketch.c next >
Encoding:
C/C++ Source or Header  |  1998-10-09  |  5.3 KB  |  183 lines
  1. /*-----------------------------------------
  2.    SKETCH.C -- Shadow Bitmap Demonstration
  3.                (c) Charles Petzold, 1998
  4.   -----------------------------------------*/
  5.  
  6. #include <windows.h>
  7.  
  8. LRESULT CALLBACK WndProc (HWND, UINT, WPARAM, LPARAM) ;
  9.  
  10. int WINAPI WinMain (HINSTANCE hInstance, HINSTANCE hPrevInstance,
  11.                     PSTR szCmdLine, int iCmdShow)
  12. {
  13.      static TCHAR szAppName [] = TEXT ("Sketch") ;
  14.      HWND         hwnd ;
  15.      MSG          msg ;
  16.      WNDCLASS     wndclass ;
  17.  
  18.      wndclass.style         = CS_HREDRAW | CS_VREDRAW ;
  19.      wndclass.lpfnWndProc   = WndProc ;
  20.      wndclass.cbClsExtra    = 0 ;
  21.      wndclass.cbWndExtra    = 0 ;
  22.      wndclass.hInstance     = hInstance ;
  23.      wndclass.hIcon         = LoadIcon (NULL, IDI_APPLICATION) ;
  24.      wndclass.hCursor       = LoadCursor (NULL, IDC_ARROW) ;
  25.      wndclass.hbrBackground = (HBRUSH) GetStockObject (WHITE_BRUSH) ;
  26.      wndclass.lpszMenuName  = NULL ;
  27.      wndclass.lpszClassName = szAppName ;
  28.      
  29.      if (!RegisterClass (&wndclass))
  30.      {
  31.           MessageBox (NULL, TEXT ("This program requires Windows NT!"),
  32.                       szAppName, MB_ICONERROR) ;
  33.           return 0 ;
  34.      }
  35.      
  36.      hwnd = CreateWindow (szAppName, TEXT ("Sketch"), 
  37.                           WS_OVERLAPPEDWINDOW, 
  38.                           CW_USEDEFAULT, CW_USEDEFAULT,
  39.                           CW_USEDEFAULT, CW_USEDEFAULT,
  40.                           NULL, NULL, hInstance, NULL) ;
  41.  
  42.      if (hwnd == NULL)
  43.      {
  44.           MessageBox (NULL, TEXT ("Not enough memory to create bitmap!"),
  45.                       szAppName, MB_ICONERROR) ;
  46.           return 0 ;
  47.      }
  48.  
  49.      ShowWindow (hwnd, iCmdShow) ;
  50.      UpdateWindow (hwnd) ;
  51.  
  52.      while (GetMessage (&msg, NULL, 0, 0))
  53.      {
  54.           TranslateMessage (&msg) ;
  55.           DispatchMessage (&msg) ;
  56.      }
  57.      return msg.wParam ;
  58. }
  59.  
  60. void GetLargestDisplayMode (int * pcxBitmap, int * pcyBitmap)
  61. {
  62.      DEVMODE devmode ;
  63.      int     iModeNum = 0 ;
  64.  
  65.      * pcxBitmap = * pcyBitmap = 0 ;
  66.  
  67.      ZeroMemory (&devmode, sizeof (DEVMODE)) ;
  68.      devmode.dmSize = sizeof (DEVMODE) ;
  69.      
  70.      while (EnumDisplaySettings (NULL, iModeNum++, &devmode))
  71.      {
  72.           * pcxBitmap = max (* pcxBitmap, (int) devmode.dmPelsWidth) ;
  73.           * pcyBitmap = max (* pcyBitmap, (int) devmode.dmPelsHeight) ;
  74.      }
  75. }
  76.  
  77. LRESULT CALLBACK WndProc (HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
  78. {
  79.      static BOOL    fLeftButtonDown, fRightButtonDown ;
  80.      static HBITMAP hBitmap ;
  81.      static HDC     hdcMem ;
  82.      static int     cxBitmap, cyBitmap, cxClient, cyClient, xMouse, yMouse ;
  83.      HDC            hdc ;
  84.      PAINTSTRUCT    ps ;
  85.      
  86.      switch (message)
  87.      {
  88.      case WM_CREATE:
  89.           GetLargestDisplayMode (&cxBitmap, &cyBitmap) ;
  90.  
  91.           hdc = GetDC (hwnd) ;
  92.           hBitmap = CreateCompatibleBitmap (hdc, cxBitmap, cyBitmap) ;
  93.           hdcMem  = CreateCompatibleDC (hdc) ;
  94.           ReleaseDC (hwnd, hdc) ;
  95.  
  96.           if (!hBitmap)       // no memory for bitmap
  97.           {
  98.                DeleteDC (hdcMem) ;
  99.                return -1 ;
  100.           }
  101.  
  102.           SelectObject (hdcMem, hBitmap) ;
  103.           PatBlt (hdcMem, 0, 0, cxBitmap, cyBitmap, WHITENESS) ;
  104.           return 0 ;
  105.  
  106.      case WM_SIZE:
  107.           cxClient = LOWORD (lParam) ;
  108.           cyClient = HIWORD (lParam) ;
  109.           return 0 ;
  110.  
  111.      case WM_LBUTTONDOWN:
  112.           if (!fRightButtonDown)
  113.                SetCapture (hwnd) ;
  114.  
  115.           xMouse = LOWORD (lParam) ;
  116.           yMouse = HIWORD (lParam) ;
  117.           fLeftButtonDown = TRUE ;
  118.           return 0 ;
  119.  
  120.      case WM_LBUTTONUP:
  121.           if (fLeftButtonDown)
  122.                SetCapture (NULL) ;
  123.           
  124.           fLeftButtonDown = FALSE ;
  125.           return 0 ;
  126.           
  127.      case WM_RBUTTONDOWN:
  128.           if (!fLeftButtonDown)
  129.                SetCapture (hwnd) ;
  130.           
  131.           xMouse = LOWORD (lParam) ;
  132.           yMouse = HIWORD (lParam) ;
  133.           fRightButtonDown = TRUE ;
  134.           return 0 ;
  135.           
  136.      case WM_RBUTTONUP:
  137.           if (fRightButtonDown) 
  138.                SetCapture (NULL) ;
  139.           
  140.           fRightButtonDown = FALSE ;
  141.           return 0 ;
  142.  
  143.      case WM_MOUSEMOVE:
  144.           if (!fLeftButtonDown && !fRightButtonDown)
  145.                return 0 ;
  146.  
  147.           hdc = GetDC (hwnd) ;
  148.  
  149.           SelectObject (hdc, 
  150.                GetStockObject (fLeftButtonDown ? BLACK_PEN : WHITE_PEN)) ;
  151.  
  152.           SelectObject (hdcMem,
  153.                GetStockObject (fLeftButtonDown ? BLACK_PEN : WHITE_PEN)) ;
  154.  
  155.           MoveToEx (hdc,    xMouse, yMouse, NULL) ;
  156.           MoveToEx (hdcMem, xMouse, yMouse, NULL) ;
  157.  
  158.           xMouse = (short) LOWORD (lParam) ;
  159.           yMouse = (short) HIWORD (lParam) ;
  160.  
  161.           LineTo (hdc,    xMouse, yMouse) ;
  162.           LineTo (hdcMem, xMouse, yMouse) ;
  163.  
  164.           ReleaseDC (hwnd, hdc) ;
  165.           return 0 ;
  166.  
  167.      case WM_PAINT:
  168.           hdc = BeginPaint (hwnd, &ps) ;
  169.  
  170.           BitBlt (hdc, 0, 0, cxClient, cyClient, hdcMem, 0, 0, SRCCOPY) ;
  171.  
  172.           EndPaint (hwnd, &ps) ;
  173.           return 0 ;
  174.  
  175.      case WM_DESTROY:
  176.           DeleteDC (hdcMem) ;
  177.           DeleteObject (hBitmap) ;
  178.           PostQuitMessage (0) ;
  179.           return 0 ;
  180.      }
  181.      return DefWindowProc (hwnd, message, wParam, lParam) ;
  182. }
  183.